
structureMismatchScore(msa, helix, one.gap.penalty = 2, two.gap.penalty = 2, invalid.penalty = 1)
Biostrings
XStringSet
object or a named array of strings like ones obtained
from converting XStringSet with as.character
.
data(helix)
mismatch <- structureMismatchScore(fasta, known)
# Sort by increasing mismatch
sorted_fasta <- fasta[order(mismatch)]
Run the code above in your browser using DataLab